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Prior Art 



10 



Create a Skeleton for 
Use by the ISPFFile 
Tailoring Utility 



Create a Table of the 
Data Needed for the 
Desired Operation, 
Write Custom JCL 



Edit the JCL and Table 
Data to Reflect Changes 
Using Cut /Copy/Paste 
and/or Query Replace 



n 
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Run JCL to Pre- format 
FTF Input Data 



j~ 
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Run the ISPF File 
Tailoring Function 
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Figure I 
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Create a Skeleton for Use by 
the ISPF File Tailoring Utility 


> 


f 


Run JCL Script to Launch 
FTAILOR and Provide 
Parameters 


> 


1 


Run FTAILOR 




f 


FTAILOR Lounches ISPF 
File Tailoring Function 


> 


f 
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Figure 3 
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Process Step 




Create a Template / Skeleton 
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Create an ISPF Environment 
in JCL 
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Example 



in file DELSKEL in directory USER.SKELS.LIB „ 
)DOT TABLE 1 ^50 

DELETE ( &DSNAME(&MBRNAME)' J 
)ENDDOT 



//FTAILOR EXEC 1SPBATCH 

//SYSEXECD DD DSN=DBDCPP.TOOLS.EXEC,DISP=SHR 



Designate the File that Contains 
the Template / Skeleton 
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//ISPSLIB DD DISP=SHR, DSN=USER.SKELS.LIB 



Creat a Reference to 
an Output File 



44 |— 



//ISPFILE DD DISP=(NEW.CATLG),DSN=USER.OUTPUT.FILE 
DCB=(LRECL=80,RECFM=FB), SPACE=(TRK, (10,1), RLSE) 
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Launch FTAILOR 



//SYSTIN DD * 

ISPSTART CMD(FTAILOR) 



Pass to FTAILOR the 
Control Parameters 
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//PARMS DD * 
SKELNAM- DELSKEL' 
KEYS='MBRNAME' 
DSNAME='xxx.yyy' 



Pass to FTAILOR the tables 
for preparation for file tailoring 


_/-47 




> 


f AS 





^Process Complete^ 



//TABLE 1 DD « 
MEMBER1 
MEMBER2 
MEMBER3 



DELETE ( xxx.yyy(MEMBER1 )' 
DELETE 'xxx.yyy(MEMBER2)' 
DELETE i xxx.yyy(MEMBER3)' 



Figure 4 
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Read/Receive Control 
Parameters from 
JCL Script 


> 


f 


Build an Empty Table or Set 
of Tables Based on 
Control Parameters 




f 


Load Empty Tables with Results 
of Logical Operations on Input 
Data per Control Parameters 




f 


Execute the ISPF Function 
FTINCL, Passing to it Skeleton 
and Created/Loaded Tables 




f 
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J~ 
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^Process Complete^ 



Figure 5 



